        SUBT    > s.FileSwitch

        GET     s.FileSwHdr
        GET     s.DebugOpts
        GET     s.FileSwBody
        GET     s.FSCommands
        GET     s.FSErrors
        GET     s.FSCommon
        GET     s.MsgsStuff
        GET     s.SysVars
        GET     s.Canonical
        GET     s.Ensure
        GET     s.FileTypes
        GET     s.DirStore

        GET     s.FSPath
        GET     s.TopPath
        GET     s.FSUtils
        GET     s.FSUtils2
        GET     s.FSUtils3
        GET     s.FSControl
        GET     s.CtrlUtils
        GET     s.FSCtrl2
        GET     s.StreamBits
        GET     s.OSFile
        GET     s.OSFind
        GET     s.OSBGetBPut
        GET     s.OSGBPB
        GET     s.OSArgs
        GET     s.LowLevel
        GBLS    whattodonow

 [ :LNOT: AssemblingArthur
whattodonow SETS " GET s.FSShared"
 |
FileSwitch_ModuleEnd

        DCD     0               ; Next module is the end of module chain now

whattodonow SETS ""
 ]

$whattodonow
        END
